<text>another babbling brookbig lightning boltbirds and waterbirds by riverbirds by river 2heavy currenthowling windhowling wind 2hurricane more rushing waternasty thunderOcean 1rain approachingrain in junglerain in woodsrain in woods 2rain puddlerainstormrainstorm 2river in spacerolling thundersandstormsandstorm 2seagull frenzysharp thundersharp thunder 2short thunder 1small waveStormstorm 1storm brewingstormingsurfsynthetic thunderthe big waveThunderthunder 1thunder 2thunder 3thunder in the distancethunder on riverthunder on river 2thunder risingthunder rumblingtide coming inwaterfall 1waterfall 2wave crashingwave crashing 2whipping windwhipping wind (short)wind and rain 1wind and rain 2wind and thunderwindstorm approach</text>
</content>
<content>
<layer>background</layer>
<id>14</id>
<text>Sound Library 2000:System7:Nature:</text>
</content>
<content>
<layer>background</layer>
<id>27</id>
<text>another babbling brook</text>
</content>
<name>Sounds of Nature</name>
<script></script>
</card>
card_8453.xml
<?xml version="1.0" encoding="utf-8" ?>
<!DOCTYPE card PUBLIC "-//Apple, Inc.//DTD card V 2.0//EN" "" >
<script>on mouseUp-- Play sounds in random order within random categoriesput "" into card field "Sound_Name" -- Sound name initially blankset visible of card field Sound_Name to true -- Show sound name fieldrepeat until the mouseClick -- Play until user clicks the mouse buttonput (the random of 10) + 3 into randCard -- Random category (cards 4 - 13)put (item 1 of any line of BG field "Displayed_Sounds" of card randCard) into resNameput (item 1 of line 1 of BG field "Path_Info" of card randCard) & resName into pathNameput resName into card field Sound_Name -- Display sound nameplaySound pathName, resName -- Play random soundend repeatset visible of card field Sound_Name to false -- Hide sound name fieldend mouseUp</script>
</part>
<part>
<id>21</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>392</left>
<top>292</top>
<right>492</right>
<bottom>314</bottom>
</rect>
<style>rectangle</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>Play All</name>
<script>on mouseUp-- Play sounds in sequential order within sequential categoriesput "" into card field "Sound_Name" -- Sound name initially blankset visible of card field Sound_Name to true -- Show sound name fieldrepeat until the mouseClick -- Play until user clicks the mouse buttonput 4 into catNumber -- Set up first card numberrepeat for 10 times -- Do for each categoryput the number of lines of BG field "Displayed_Sounds" of card catNumber into numLinesput 1 into SN -- Set up first sound numberrepeat for numLines times -- Do for each line (sound) in that cardif the mouseClick then -- Must trap for mouse click hereset visible of card field Sound_Name to falseexit mouseUpend ifput (item 1 of line SN of BG field "Displayed_Sounds" of card catNumber) into resNameput (item 1 of line 1 of BG field "Path_Info" of card catNumber) & resName into pathNameput resName into card field Sound_Name -- Display sound nameplaySound pathName, resName -- Play the soundadd 1 to SN -- Increment the sound numberend repeatadd 1 to catNumber -- Increment the category numberend repeatend repeatset visible of card field Sound_Name to false -- Hide sound name fieldend mouseUp</script>
</part>
<part>
<id>22</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <true /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>294</left>
<top>319</top>
<right>492</right>
<bottom>337</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>right</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name>Sound_Name</name>
<script></script>
</part>
<content>
<layer>card</layer>
<id>22</id>
<text>african frog</text>
</content>
<name>MainMenu</name>
<script></script>
</card>
card_4933.xml
<?xml version="1.0" encoding="utf-8" ?>
<!DOCTYPE card PUBLIC "-//Apple, Inc.//DTD card V 2.0//EN" "" >
<script>on mouseUpvisual effect barn door closego to card "MainMenu"end mouseUp</script>
</part>
<part>
<id>2</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>41</left>
<top>215</top>
<right>157</right>
<bottom>299</bottom>
</rect>
<style>roundrect</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>-1</titleWidth>
<icon>-16491</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>Joe's comments</name>
<script>on mouseUpset the cursor to "busy" -- Set the "busy" cursorplaySound "Sound Library 2000:other:SL2000 introduction", "SL2000 introduction" -- Play the sound (XCMD)if the result is not empty thenput the result&"(more memory) : Introduction" into errStranswer errStr with "OK"end ifend mouseUp</script>
</part>
<name>Credits</name>
<script></script>
</card>
card_2944.xml
<?xml version="1.0" encoding="utf-8" ?>
<!DOCTYPE card PUBLIC "-//Apple, Inc.//DTD card V 2.0//EN" "" >
<script>------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------On openCardglobal pathNameglobal resName-- Display (pre-allocated) logo picture in splash screen-- global splashWindowName-- put "logoPictColor" into splashWindowName -- Set up color picture names-- picture splashWindowName, resource, rect, true -- Allocate memory for PICT resourcesSend colorMe to this cardset the cursor to "busy" -- Set the "busy" cursorif not (the mouseClick) thenplaySound "Sound Library 2000:system7:Household:breaking glass 2", "breaking glass 2" -- Play the sound (XCMD)if not (the mouseClick) thenplaySound "Sound Library 2000:system7:People:frustrated boy", "frustrated boy" -- Play the sound (XCMD)if not (the mouseClick) thenplaySound "Sound Library 2000:system7:Household:sweeping glass", "sweeping glass" -- Play the sound (XCMD)end ifend ifend ifpass openCardEnd openCard------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------On mouseUpInPicture-- Handle mouse click within the pictureglobal splashWindowNamevisual effect venetian blindsgo to card "MainMenu"End mouseUpInPicture------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------On MouseUp-- Handle mouse click outside the picturevisual effect venetian blindsgo to card "MainMenu"End MouseUp------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------on closeCard-- Only hide splashWindow if not quitting. Otherwise, the picture has already been disposed-- (by HyperCard) and does not exist.global splashWindowNameif there is a Window splashWindowName thenclose Window splashWindowNameend ifpass closeCardend closeCard------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------on resumeStack-- Show picture when returning from HELP (for example).global splashWindowNamepicture splashWindowName, resource, rect, true -- Allocate memory for PICT resourcespass resumeStackend resumeStack------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------on suspendStack-- Hide picture upon HELP (for example)global splashWindowNamepass suspendStackend suspendStack------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------</script>
.iso/pc/other/sound_li.bra/BMAP_9736.png){kind=link}
.iso/pc/other/sound_li.bra/PATs.png){kind=link}